Fortran 指针数组

在 Fortran 中不能使用指针数组，但可以创建一个只包含指针的变量：

type ptr
  real, dimension(:), pointer :: p
end type

其值可以用 p1(3)%p 访问。